10 REM DISK MONITOR =============64 20 REM (P) COMMODORE DISC 30 REM ============================ 40 REM (C) BY = 50 REM BERND KAPONIG = 60 REM = 70 REM A-6923 LAUTERACH = 80 REM = 90 REM VERSION 2.0 = 95 REM C-64 + VC-1541 = 96 REM ============================ 120 A$="****************************" 130 B$=" D I S K M O N I T O R " 140 C$=" VON BERND KAPONIG " 150 PRINTCHR$(147):POKE53280,0:POKE53281,0 160 POKE1024,85:FORT=1025TO1062:POKET,67:POKET+960,67:NEXT:POKE1063,73 170 POKE1984,74:POKE2023,75:FORT=1944TO1064STEP-40:POKET,66:POKET+39,66:NEXT 180 PRINTSPC(86)A$:PRINTSPC(46)B$:PRINTSPC(46)C$:PRINTSPC(86)A$ 190 PRINTSPC(248)"DATEN WERDEN EINGELESEN" 200 REM 210 REM 220 PRINTSPC(50)"BITTE 120 SEC WARTEN" 230 REM 240 REM 250 DIMH(75):FORI=0TO9 260 H(48+I)=I:H(65+I)=I+10:NEXT 270 FORT=49152TO51797:READX$ 280 H=ASC(LEFT$(X$,1)):L=ASC(RIGHT$(X$,1)) 290 A=H(H)*16+H(L):S=S+A:IFA=18THENA=0 300 POKET,A 310 N=N+1:IFN<6THEN NEXT: N=-1 320 READ V:Z=Z+1:IFV=S THEN340 325 POKE53280,254:POKE53281,246 330 PRINTCHR$(147);SPC(82);"CHECKSUMERROR IN ZEILE ";999+Z:STOP 340 IFN<0THENZ=0:GOTO360 350 S=0:N=0:NEXT 360 FORT=1TO44:READX$ 370 H=ASC(LEFT$(X$,1)):L=ASC(RIGHT$(X$,1)) 380 A=H(H)*16+H(L):S=S+A:POKE575+T,A 390 N=N+1:IFN<6THEN NEXTT: N=-1 400 READV:Z=Z+1:IFT=45THEN440 410 IFV=STHEN430 415 POKE53280,254:POKE53281,246 420 PRINTCHR$(147);SPC(82);"CHECKSUMERROR IN ZEILE ";1449+Z:STOP 430 S=0:N=0:NEXT 440 POKE251,0:POKE252,192:PRINTSPC(46)"DISK EINLEGEN-TASTE DRUECKEN" 450 GETA$:IFA$=""THEN450 460 REM 470 SYS576:SYS49152 1000 DATA A2,00,BD,00,C4,20, 579 1001 DATA D2,FF,E8,E0,FF,D0, 1384 1002 DATA F5,A2,0D,A9,3E,20, 683 1003 DATA EB,C0,A9,00,8D,01, 738 1004 DATA 02,20,33,C1,4C,00, 354 1005 DATA C5,EA,C9,20,F0,F5, 1149 1006 DATA A2,05,DD,6A,C0,D0, 894 1007 DATA 0C,8E,00,02,BD,70, 457 1008 DATA C0,48,BD,76,C0,48, 835 1009 DATA 60,CA,10,EC,4C,0D, 639 1010 DATA C0,85,97,20,62,C0, 798 1011 DATA B9,E0,C2,20,DC,C0, 1047 1012 DATA C8,D0,03,EE,01,02, 652 1013 DATA C6,97,D0,ED,60,20, 922 1014 DATA FE,C0,90,03,99,E0, 970 1015 DATA C2,C8,C6,97,60,20, 871 1016 DATA 62,C0,A9,20,2C,A9, 704 1017 DATA 0D,4C,D2,FF,3A,57, 699 1018 DATA 52,4D,40,58,C0,C1, 696 1019 DATA C1,C0,C1,E3,C0,90, 1141 1020 DATA 90,7B,3E,7A,A0,00, 611 1021 DATA 8C,03,02,88,8C,04, 425 1022 DATA 02,20,CF,FF,C9,0D, 710 1023 DATA F0,17,20,FE,C0,90, 885 1024 DATA 00,8D,03,02,20,CF, 385 1025 DATA FF,C9,0D,F0,08,20, 749 1026 DATA FE,C0,90,03,8D,04, 738 1027 DATA 02,AC,03,02,20,C6, 409 1028 DATA C2,20,D6,C2,98,20, 818 1029 DATA DC,C0,20,62,C0,A9, 903 1030 DATA 08,20,3D,C0,20,97, 476 1031 DATA C2,4C,A6,C0,4C,0D, 717 1032 DATA C0,20,FE,C0,90,F8, 1062 1033 DATA A8,A9,08,85,97,20, 661 1034 DATA 33,C1,20,33,C1,20, 552 1035 DATA 53,C0,D0,F8,20,97, 914 1036 DATA C2,4C,0D,C0,48,4A, 621 1037 DATA 4A,4A,4A,20,F4,C0, 690 1038 DATA AA,68,29,0F,20,F4, 606 1039 DATA C0,48,8A,20,D2,FF, 899 1040 DATA 68,4C,D2,FF,18,69, 774 1041 DATA F6,90,02,69,06,69, 608 1042 DATA 3A,60,A9,00,8D,02, 466 1043 DATA 02,20,33,C1,C9,20, 511 1044 DATA D0,09,20,33,C1,C9, 694 1045 DATA 20,D0,0F,18,60,20, 407 1046 DATA 28,C1,0A,0A,0A,0A, 273 1047 DATA 8D,02,02,20,33,C1, 421 1048 DATA 20,28,C1,0D,02,02, 282 1049 DATA 38,60,C9,3A,08,29, 460 1050 DATA 0F,28,90,02,69,08, 314 1051 DATA 60,20,CF,FF,C9,0D, 804 1052 DATA D0,F8,68,68,4C,0D, 753 1053 DATA C0,20,CF,FF,C9,0D, 900 1054 DATA D0,27,A9,00,85,90, 693 1055 DATA 20,65,C0,A9,08,85, 635 1056 DATA BA,20,B4,FF,A9,6F, 933 1057 DATA 85,B9,20,96,FF,20, 787 1058 DATA A5,FF,24,90,70,05, 717 1059 DATA 20,D2,FF,D0,F4,20, 981 1060 DATA AB,FF,4C,0D,C0,C9, 908 1061 DATA 24,F0,1D,48,A9,08, 554 1062 DATA 85,BA,20,B1,FF,A9, 952 1063 DATA 6F,85,B9,20,93,FF, 863 1064 DATA 68,20,A8,FF,20,CF, 798 1065 DATA FF,C9,0D,D0,F6,20, 955 1066 DATA AE,FF,4C,0D,C0,20, 742 1067 DATA 33,C1,20,FE,C0,90, 866 1068 DATA F5,8D,27,C2,20,33, 702 1069 DATA C1,20,FE,C0,90,EA, 1049 1070 DATA 8D,2A,C2,20,49,C2, 676 1071 DATA AD,00,02,C9,01,F0, 617 1072 DATA 1E,A9,31,20,ED,C1, 710 1073 DATA A2,0D,20,C6,FF,A2, 822 1074 DATA 00,20,CF,FF,9D,E0, 875 1075 DATA C2,E8,D0,F7,20,CC, 1117 1076 DATA FF,20,6E,C2,4C,0D, 680 1077 DATA C0,20,2C,C2,A2,0D, 637 1078 DATA 20,C9,FF,A2,00,BD, 839 1079 DATA E0,C2,20,D2,FF,E8, 1147 1080 DATA D0,F7,20,CC,FF,A9, 1115 1081 DATA 32,20,ED,C1,4C,C9, 789 1082 DATA C1,8D,20,C2,A2,0F, 737 1083 DATA AD,27,C2,20,78,C2, 752 1084 DATA 8E,27,C2,8D,28,C2, 750 1085 DATA AD,2A,C2,20,78,C2, 755 1086 DATA 8E,2A,C2,8D,2B,C2, 756 1087 DATA A2,0F,20,C9,FF,A2, 827 1088 DATA 00,BD,1F,C2,20,D2, 656 1089 DATA FF,E8,E0,0D,D0,F5, 1177 1090 DATA 4C,CC,FF,55,31,3A, 727 1091 DATA 31,33,20,30,20,31, 261 1092 DATA 38,20,30,31,A2,0F, 362 1093 DATA 20,C9,FF,A2,00,BD, 839 1094 DATA 41,C2,20,D2,FF,E8, 988 1095 DATA E0,08,D0,F5,4C,CC, 965 1096 DATA FF,42,2D,50,20,31, 527 1097 DATA 33,20,30,A9,0F,A8, 483 1098 DATA A2,08,20,BA,FF,A9, 812 1099 DATA 00,20,BD,FF,20,C0, 700 1100 DATA FF,A9,0D,A8,A2,08, 775 1101 DATA 20,BA,FF,A9,01,A2, 805 1102 DATA 6D,A0,C2,20,BD,FF, 939 1103 DATA 4C,C0,FF,23,A9,0D, 740 1104 DATA 20,C3,FF,A9,0F,4C, 742 1105 DATA C3,FF,A2,30,38,E9, 949 1106 DATA 0A,90,03,E8,B0,F9, 814 1107 DATA 69,3A,60,0D,28,43, 379 1108 DATA 29,20,31,39,38,34, 287 1109 DATA 20,4B,41,50,4F,4E, 409 1110 DATA 49,47,20,98,38,E9, 617 1111 DATA 08,A8,20,62,C0,A9, 667 1112 DATA 00,20,D2,FF,A2,08, 667 1113 DATA B9,E0,C2,29,7F,C9, 972 1114 DATA 20,B0,04,A9,2E,D0, 635 1115 DATA 03,B9,E0,C2,20,D2, 848 1116 DATA FF,A9,00,85,D4,C8, 969 1117 DATA CA,D0,E5,A9,92,4C, 1030 1118 DATA D2,FF,AD,01,02,D0, 849 1119 DATA 06,CC,04,02,B0,01, 393 1120 DATA 60,68,68,4C,0D,C0, 585 1121 DATA 20,65,C0,A9,3A,A2, 714 1122 DATA 3E,4C,EB,C0,00,04, 569 1123 DATA 82,13,05,44,4D,2D, 344 1124 DATA 53,41,56,45,A0,A0, 623 1125 DATA A0,A0,A0,A0,A0,A0, 960 1126 DATA A0,00,00,00,00,00, 160 1127 DATA 00,00,00,00,01,00, 1 1128 DATA 00,00,82,11,03,44, 218 1129 DATA 49,52,45,58,A0,A0, 632 1130 DATA A0,A0,A0,A0,A0,A0, 960 1131 DATA A0,A0,A0,00,00,00, 480 1132 DATA 00,00,00,00,00,00, 0 1133 DATA 06,00,00,00,82,11, 153 1134 DATA 00,44,49,52,45,43, 359 1135 DATA 54,4F,52,59,A0,A0, 654 1136 DATA A0,A0,A0,A0,A0,00, 800 1137 DATA 00,00,00,00,00,00, 0 1138 DATA 00,00,01,00,00,00, 1 1139 DATA 82,11,08,44,49,53, 379 1140 DATA 4B,20,44,A0,A0,A0, 655 1141 DATA A0,A0,A0,A0,A0,A0, 960 1142 DATA A0,00,00,00,00,00, 160 1143 DATA 00,00,00,00,07,00, 7 1144 DATA 00,00,82,11,04,44, 219 1145 DATA 45,5A,2D,48,45,58, 433 1146 DATA A0,A0,A0,A0,A0,A0, 960 1147 DATA A0,A0,A0,00,00,00, 480 1148 DATA 00,00,00,00,00,00, 0 1149 DATA 01,00,00,00,82,13, 150 1150 DATA 01,44,49,53,4B,20, 332 1151 DATA 48,A0,A0,A0,A0,A0, 872 1152 DATA A0,A0,A0,A0,A0,00, 800 1153 DATA 00,00,00,00,00,00, 0 1154 DATA 00,00,08,00,00,00, 8 1155 DATA 82,13,00,50,4F,4B, 383 1156 DATA 45,53,A0,A0,A0,A0, 792 1157 DATA A0,A0,A0,A0,A0,A0, 960 1158 DATA A0,00,00,00,00,00, 160 1159 DATA 00,00,00,00,01,00, 1 1160 DATA 00,00,82,13,08,44, 225 1161 DATA 49,53,4B,20,41,A0, 488 1162 DATA A0,A0,A0,A0,A0,A0, 960 1163 DATA A0,A0,A0,00,00,00, 480 1164 DATA 00,00,00,00,00,00, 0 1165 DATA 07,00,80,80,FF,FF, 773 1166 DATA 80,80,FF,FF,80,80, 1022 1167 DATA FF,FF,80,80,FF,FF, 1276 1168 DATA 80,80,FF,FF,80,80, 1022 1169 DATA FF,FF,80,80,FF,FF, 1276 1170 DATA 5E,80,FF,7F,93,20, 783 1171 DATA 20,20,20,20,20,20, 192 1172 DATA 20,20,20,20,20,20, 192 1173 DATA 20,20,20,20,20,20, 192 1174 DATA 20,20,20,20,20,20, 192 1175 DATA 20,20,20,20,20,20, 192 1176 DATA 20,20,20,20,20,20, 192 1177 DATA 20,20,20,B7,B7,B7, 645 1178 DATA B7,B7,B7,B7,B7,B7, 1098 1179 DATA B7,B7,B7,B7,B7,B7, 1098 1180 DATA B7,B7,B7,B7,B7,B7, 1098 1181 DATA B7,B7,B7,B7,B7,B7, 1098 1182 DATA B7,B7,B7,B7,B7,B7, 1098 1183 DATA B7,B7,B7,B7,B7,B7, 1098 1184 DATA B7,20,20,20,20,44, 379 1185 DATA 49,53,4B,20,4D,4F, 419 1186 DATA 4E,49,54,4F,52,20, 428 1187 DATA 2D,20,45,58,50,41, 379 1188 DATA 4E,44,45,44,20,4C, 391 1189 DATA 45,56,45,4C,20,49, 405 1190 DATA 49,20,20,20,20,AF, 376 1191 DATA AF,AF,AF,AF,AF,AF, 1050 1192 DATA AF,AF,AF,AF,AF,AF, 1050 1193 DATA AF,AF,AF,AF,AF,AF, 1050 1194 DATA AF,AF,AF,AF,AF,AF, 1050 1195 DATA AF,AF,AF,AF,AF,AF, 1050 1196 DATA AF,AF,AF,AF,AF,AF, 1050 1197 DATA AF,AF,AF,20,20,20, 621 1198 DATA 20,20,20,20,20,20, 192 1199 DATA 20,20,20,20,20,20, 192 1200 DATA 20,20,20,20,20,20, 192 1201 DATA 20,20,20,20,20,20, 192 1202 DATA 20,20,20,20,20,20, 192 1203 DATA 20,20,20,20,20,20, 192 1204 DATA 20,20,20,20,42,59, 283 1205 DATA 20,42,45,52,4E,59, 416 1206 DATA 20,4B,41,50,4F,4E, 409 1207 DATA 49,47,20,41,4E,44, 387 1208 DATA 20,4A,49,4D,4D,59, 422 1209 DATA 20,53,54,41,4D,50, 421 1210 DATA 46,4C,20,20,20,20, 274 1211 DATA 20,20,20,20,20,20, 192 1212 DATA 20,20,20,20,20,20, 192 1213 DATA 20,20,C9,3E,F0,03, 570 1214 DATA 4C,0A,C5,4C,19,C0, 576 1215 DATA C9,44,F0,03,4C,14, 608 1216 DATA C5,4C,D3,C5,C9,24, 918 1217 DATA F0,03,4C,1E,C5,4C, 622 1218 DATA 30,C5,C9,23,F0,03, 724 1219 DATA 4C,28,C5,4C,60,C6, 683 1220 DATA C9,3D,F0,03,4C,C0, 773 1221 DATA C7,4C,3B,C7,EA,EA, 1001 1222 DATA EA,A2,00,20,CF,FF, 890 1223 DATA C9,00,F0,F9,9D,40, 911 1224 DATA 02,E8,C9,0D,D0,F1, 897 1225 DATA EA,D8,AD,40,02,C9, 890 1226 DATA 3A,90,03,18,69,09, 343 1227 DATA 29,0F,0A,0A,0A,0A, 96 1228 DATA 8D,40,02,AD,41,02, 447 1229 DATA C9,3A,90,03,18,69, 535 1230 DATA 09,29,0F,6D,40,02, 240 1231 DATA 8D,40,02,EA,EA,EA, 909 1232 DATA EA,AE,40,02,A9,00, 643 1233 DATA 85,02,86,03,85,04, 409 1234 DATA 85,05,85,06,F8,A0, 685 1235 DATA 10,A2,03,06,03,26, 228 1236 DATA 02,B5,03,75,03,95, 455 1237 DATA 03,CA,D0,F7,88,D0, 1004 1238 DATA EE,D8,A5,04,A6,05, 794 1239 DATA A4,06,EA,EA,EA,EA, 1106 1240 DATA EA,A9,3D,20,16,E7, 749 1241 DATA A9,20,20,16,E7,A5, 651 1242 DATA 05,18,A5,05,18,69, 328 1243 DATA 30,20,16,E7,A5,06, 504 1244 DATA 4A,4A,4A,4A,18,69, 425 1245 DATA 30,20,16,E7,A5,06, 504 1246 DATA 29,0F,18,69,30,20, 265 1247 DATA 16,E7,EA,EA,EA,4C, 1031 1248 DATA 0D,C0,EA,A2,00,20, 633 1249 DATA CF,FF,C9,00,F0,F9, 1152 1250 DATA C9,0D,D0,F5,A9,20, 868 1251 DATA 20,D2,FF,E8,E0,25, 990 1252 DATA D0,F6,EA,EA,EA,EA, 1390 1253 DATA EA,EA,A9,24,85,FB, 1057 1254 DATA A9,FB,85,BB,A9,00, 909 1255 DATA 85,BC,A9,01,85,B7, 807 1256 DATA A9,08,85,BA,A9,60, 761 1257 DATA 85,B9,20,D5,F3,A5, 971 1258 DATA BA,20,B4,FF,A5,B9, 1003 1259 DATA 20,96,FF,A9,00,85, 739 1260 DATA 90,A0,03,84,FB,20, 722 1261 DATA A5,FF,85,FC,A4,90, 1113 1262 DATA D0,2F,20,A5,FF,A4, 871 1263 DATA 90,D0,28,A4,FB,88, 943 1264 DATA D0,E9,A6,FC,20,CD, 1096 1265 DATA BD,A9,20,20,D2,FF, 887 1266 DATA 20,A5,FF,A6,90,D0, 970 1267 DATA 00,AA,F0,06,20,D2, 658 1268 DATA FF,4C,3C,C6,A9,0D, 771 1269 DATA 20,D2,FF,A0,02,D0, 867 1270 DATA C6,20,42,F6,4C,0D, 631 1271 DATA C0,EA,EA,EA,EA,EA, 1362 1272 DATA A2,00,20,CF,FF,C9, 857 1273 DATA 00,F0,F9,9D,40,02, 712 1274 DATA E8,C9,0D,D0,F1,EA, 1129 1275 DATA EA,AD,40,02,E9,30, 754 1276 DATA 8D,40,02,AD,41,02, 447 1277 DATA E9,30,8D,41,02,AD, 662 1278 DATA 42,02,E9,30,8D,42, 556 1279 DATA 02,EA,D8,A2,00,AD, 787 1280 DATA 40,02,18,6D,40,02, 265 1281 DATA E8,E0,63,D0,F7,8D, 1151 1282 DATA 40,02,EA,D8,A2,00, 678 1283 DATA AD,41,02,18,6D,41, 438 1284 DATA 02,E8,E0,09,D0,F7, 922 1285 DATA 8D,41,02,EA,EA,AD, 849 1286 DATA 40,02,18,6D,41,02, 266 1287 DATA 18,6D,42,02,8D,40, 406 1288 DATA 02,EA,EA,EA,AD,40, 941 1289 DATA 02,8D,43,02,18,4A, 310 1290 DATA 4A,4A,4A,8D,40,02, 429 1291 DATA EA,AD,43,02,18,0A, 510 1292 DATA 0A,0A,0A,18,4A,4A, 202 1293 DATA 4A,4A,8D,43,02,EA, 592 1294 DATA EA,EA,EA,EA,EA,EA, 1404 1295 DATA EA,A9,3D,20,16,E7, 749 1296 DATA A9,20,20,16,E7,EA, 720 1297 DATA AD,40,02,C9,00,F0, 680 1298 DATA 08,C9,0A,90,04,C9, 568 1299 DATA 09,B0,09,18,69,30, 371 1300 DATA 20,16,E7,4C,17,C7, 583 1301 DATA 18,69,37,20,16,E7, 469 1302 DATA EA,EA,EA,AD,43,02, 944 1303 DATA C9,00,F0,08,C9,0A, 660 1304 DATA 90,04,C9,09,B0,09, 543 1305 DATA 18,69,30,20,16,E7, 462 1306 DATA 4C,0D,C0,18,69,37, 465 1307 DATA 20,16,E7,4C,0D,C0, 566 1308 DATA 00,00,00,A2,00,20, 194 1309 DATA CF,FF,C9,00,F0,F9, 1152 1310 DATA 9D,40,02,E8,C9,0D, 669 1311 DATA D0,F1,EA,AD,42,02, 924 1312 DATA 8D,48,02,EA,EA,EA, 917 1313 DATA A2,00,BD,40,02,C9, 618 1314 DATA 3A,90,04,C9,39,B0, 640 1315 DATA 0E,D8,E9,2F,9D,40, 731 1316 DATA 02,E8,E0,05,D0,EA, 905 1317 DATA 4C,7C,C7,D8,E9,37, 903 1318 DATA 9D,40,02,E8,E0,05, 684 1319 DATA D0,DC,EA,EA,AD,40, 1133 1320 DATA 02,0A,0A,0A,0A,18, 66 1321 DATA 6D,41,02,8D,40,02, 383 1322 DATA AD,43,02,0A,0A,0A, 272 1323 DATA 0A,18,6D,44,02,8D, 354 1324 DATA 43,02,EA,EA,AD,48, 782 1325 DATA 02,C9,2B,F0,0C,AD, 671 1326 DATA 40,02,ED,43,02,8D, 513 1327 DATA 40,02,4C,C4,C6,AD, 709 1328 DATA 40,02,18,6D,43,02, 268 1329 DATA 8D,40,02,4C,C4,C6, 677 1330 DATA EA,EA,EA,EA,C9,43, 1204 1331 DATA F0,03,4C,20,C0,20, 575 1332 DATA CF,FF,C9,00,F0,F9, 1152 1333 DATA C9,0D,D0,F5,A9,20, 868 1334 DATA 20,D2,FF,4C,F0,C7, 1012 1335 DATA 44,41,54,45,49,4E, 437 1336 DATA 41,4D,45,3A,44,41, 402 1337 DATA 54,45,49,54,59,50, 479 1338 DATA 3A,20,DF,DF,A2,00, 698 1339 DATA BD,DA,C7,20,D2,FF, 1103 1340 DATA E8,E0,0A,D0,F5,EA, 1153 1341 DATA A2,00,20,CF,FF,C9, 857 1342 DATA 00,F0,F9,9D,40,02, 712 1343 DATA E8,86,FB,C9,0D,D0, 1039 1344 DATA EF,EA,A9,2C,9D,3F, 906 1345 DATA 02,E8,A0,00,B9,E4, 807 1346 DATA C7,20,D2,FF,C8,C0, 1088 1347 DATA 09,D0,F5,EA,A0,00, 856 1348 DATA 20,CF,FF,C9,00,F0, 935 1349 DATA F9,9D,3F,02,86,FB, 856 1350 DATA EA,4C,5F,C8,93,11, 769 1351 DATA 00,4F,52,49,47,49, 378 1352 DATA 4E,41,4C,44,49,53, 443 1353 DATA 4B,20,45,49,4E,4C, 403 1354 DATA 45,47,45,4E,20,2D, 364 1355 DATA 20,43,3D,20,44,52, 342 1356 DATA 55,45,43,4B,45,4E, 443 1357 DATA 92,A2,00,EA,BD,38, 787 1358 DATA C8,20,D2,FF,E8,E0, 1153 1359 DATA 27,D0,F5,EA,20,E0, 982 1360 DATA E4,EA,EA,EA,EA,EA, 1398 1361 DATA A9,02,A2,08,A0,02, 503 1362 DATA 20,BA,FF,A5,FB,A2, 1051 1363 DATA 40,A0,02,20,BD,FF, 702 1364 DATA 20,C0,FF,EA,A9,00, 882 1365 DATA 85,03,A9,0C,85,04, 454 1366 DATA 20,49,C9,A9,02,20, 509 1367 DATA C3,FF,EA,EA,4C,C7, 1193 1368 DATA C8,13,11,11,11,00, 270 1369 DATA 5A,49,45,4C,44,49, 449 1370 DATA 53,4B,20,45,49,4E, 410 1371 DATA 4C,45,47,45,4E,20, 395 1372 DATA 2D,20,43,3D,20,44, 305 1373 DATA 52,55,45,43,4B,45, 447 1374 DATA 4E,92,4E,A2,00,BD, 653 1375 DATA A1,C8,20,D2,FF,E8, 1090 1376 DATA E0,25,D0,F5,EA,20, 980 1377 DATA E0,E4,4C,DB,C8,EA, 1181 1378 DATA EA,EA,EA,EA,EA,A6, 1336 1379 DATA FB,EA,A9,2C,9D,40, 919 1380 DATA 02,E8,A9,57,9D,40, 711 1381 DATA 02,E8,86,FB,EA,A9, 1022 1382 DATA 02,A2,08,A0,02,20, 366 1383 DATA BA,FF,A5,FB,A2,40, 1083 1384 DATA A0,02,20,BD,FF,20, 670 1385 DATA C0,FF,A9,00,85,03, 752 1386 DATA A9,0C,85,04,20,20, 382 1387 DATA C9,A9,02,20,C3,FF, 854 1388 DATA 4C,0D,C0,EA,EA,EA, 983 1389 DATA EA,EA,A2,02,20,C9, 865 1390 DATA FF,C6,01,A0,00,38, 670 1391 DATA A5,03,E5,05,A5,04, 571 1392 DATA E5,06,B0,0D,B1,03, 604 1393 DATA 20,D2,FF,E6,03,D0, 938 1394 DATA EC,E6,04,D0,E8,E6, 1140 1395 DATA 01,4C,CC,FF,4C,49, 685 1396 DATA C9,A2,02,20,C6,FF, 850 1397 DATA A0,00,20,CF,FF,91, 799 1398 DATA 03,E6,03,D0,02,E6, 676 1399 DATA 04,24,90,50,F1,A5, 670 1400 DATA 03,85,05,A5,04,85, 443 1401 DATA 06,4C,CC,FF,60,CC, 841 1402 DATA CC,7F,7F,7F,20,20, 649 1403 DATA 7F,7F,20,20,7B,7B, 564 1404 DATA 00,20,7F,7F,20,28, 358 1405 DATA 7F,7E,80,A0,BF,FF, 987 1406 DATA A0,A0,BF,FF,A0,A0, 1086 1407 DATA BF,BF,A0,A0,BF,BF, 1084 1408 DATA A0,A0,BF,BF,A0,A0, 1022 1409 DATA BF,BF,A0,A0,BF,BF, 1084 1410 DATA A0,A0,BF,BF,A0,A0, 1022 1411 DATA BF,BF,A0,A0,BF,BF, 1084 1412 DATA A0,A0,BF,BF,A0,A0, 1022 1413 DATA BF,BF,A0,A0,BF,BF, 1084 1414 DATA A0,A0,BF,BF,A0,A0, 1022 1415 DATA BF,BF,A1,A1,BF,BF, 1086 1416 DATA A0,A0,BF,BF,A0,A0, 1022 1417 DATA BF,BF,A0,A0,BF,BF, 1084 1418 DATA A0,A0,BF,BF,A0,A0, 1022 1419 DATA BF,BF,A0,A0,BF,BF, 1084 1420 DATA A0,A0,BF,BF,A0,A0, 1022 1421 DATA BF,BF,A0,A0,BF,BF, 1084 1422 DATA A0,A0,BF,BF,A0,A0, 1022 1423 DATA BF,BF,A0,A0,BF,BF, 1084 1424 DATA A0,A0,BF,BF,A0,A0, 1022 1425 DATA BB,BB,A0,A0,BF,BF, 1076 1426 DATA A8,A8,BF,BF,5F,5F, 908 1427 DATA 00,00,5F,5F,00,00, 190 1428 DATA 5F,5F,00,04,5F,5F, 384 1429 DATA 00,00,5F,5F,04,04, 198 1430 DATA 5F,5F,00,00,5F,5F, 380 1431 DATA 00,04,5F,5F,00,00, 194 1432 DATA 5F,5F,00,00,5F,5F, 380 1433 DATA 00,00,5F,5F,00,00, 190 1434 DATA 5F,5F,00,00,5F,5F, 380 1435 DATA 00,00,5F,5F,00,00, 190 1436 DATA 5F,5F,00,00,5E,5E, 378 1437 DATA 00,00,5F,5F,00,00, 190 1438 DATA 5F,5F,00,00,5F,5F, 380 1439 DATA 00,00,5F,5F,00,00, 190 1440 DATA 5F,1F,00,00,5F,00, 221 1445 REM ************************** 1450 REM **** SAVE-PROGRAMM DATEN * 1460 DATA A2,08,20,BA,FF,A9, 812 1461 DATA 0C,A2,60,A0,02,20, 464 1462 DATA BD,FF,A9,FB,A2,55, 1111 1463 DATA A0,CA,20,D8,FF,60, 961 1464 DATA 00,00,00,00,00,00, 0 1465 DATA 00,00,44,49,53,4B, 299 1466 DATA 20,4D,4F,4E,49,54, 423 1467 DATA 4F,52, 161 2000 REM DISKMONITOR ============64 2010 REM 38911 BYTES MEMORY ==== 2020 REM 14795 BYTES PROGRAM ==== 2030 REM 00091 BYTES VARIABLES ==== 2040 REM 00387 BYTES ARRAYS ==== 2050 REM 00000 BYTES STRINGS ==== 2060 REM 23638 BYTES FREE ==== 2070 REM ==========================